From: Richard M. Stallman Date: Tue, 4 May 1993 16:42:57 +0000 (+0000) Subject: (minor-mode-map-alist): Don't use it if it's void. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96395 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1434b7aabc2151fea734c4fe26b758fa6a42d20a;p=emacs.git (minor-mode-map-alist): Don't use it if it's void. --- diff --git a/lisp/vc.el b/lisp/vc.el index 3bd5cda97a5..bd49eba4e45 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -812,9 +812,10 @@ the variable vc-header-alist" (defvar vc-dired-prefix-map (make-sparse-keymap)) (define-key vc-dired-prefix-map "\C-xv" vc-prefix-map) -(or (assq 'vc-dired-mode minor-mode-map-alist) +(or (not (boundp 'minor-mode-map-alist)) + (assq 'vc-dired-mode minor-mode-map-alist) (setq minor-mode-map-alist - (cons '(vc-dired-mode vc-dired-prefix-map) + (cons '(vc-dired-mode . vc-dired-prefix-map) minor-mode-map-alist))) (defun vc-dired-mode ()